home *** CD-ROM | disk | FTP | other *** search
/ PC Answers 1998 January / PC Answers Issue 49 Cover CD January 1998.iso / Apps / Director / DATA.Z / ScriptAuthor-Navigate.dir / Scripts_3_Expand Window.ls < prev    next >
Encoding:
Text File  |  1997-05-10  |  291 b   |  16 lines
  1. global gScriptAuthoringWindow
  2.  
  3. on mouseUp
  4.   if gScriptAuthoringWindow = the stage then
  5.     tell the stage
  6.       PlaySound("ButtonClick")
  7.     end tell
  8.   else
  9.     tell gScriptAuthoringWindow
  10.       PlaySound("ButtonClick")
  11.     end tell
  12.   end if
  13.   ChangeWindowSize(#Expand)
  14.   go("Expanded")
  15. end
  16.